home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 July / Chip_1999-07_cd.bin / zkuste / MacOS / Data / Files / sms.sit / Smart Scroll 3.5 / for Developers / SmartScrollAPI.p < prev   
Text File  |  1997-11-25  |  746b  |  30 lines
  1. unit SmartScrollAPI;
  2.  
  3. {
  4.      File:        SmartScrollAPI.p
  5.  
  6.      Contains:    Smart Scroll Application Programming Interface
  7.  
  8.      Version:    1.2
  9.  
  10.      Copyright:    ⌐ 1996 by Marc Moini, portions by Marc Menschenfreund,
  11.                 Alessandro Levi Montalcini and Mark Shirley (Thanks!)
  12.                   All rights reserved.
  13.  
  14.      Bugs?:        If you find a problem with this file, please email Marc@Kagi.com
  15.      
  16.      Converted to Pascal by Peter N Lewis <peter@stairways.com.au>
  17. }
  18.  
  19. interface
  20.  
  21.     uses
  22.         Types, Controls;
  23.  
  24.     procedure SetSmartScrollInfo( theScrollBar: ControlRef; amountVisible, amountTotal: longint );
  25.     procedure SetSmartScrollProp( theScrollBar: ControlRef; proportion: Fract );
  26.     function GetSmartScrollProp( theScrollBar: ControlRef ): Fract;
  27.     procedure DisposeAllSmartScrolls;
  28.  
  29. end.
  30.